NewZipFile method

Calling this method will create and return an instance of ZipFile object that you can use to work with ZIP archives.

Member of

Runtime

Type

Function(FileName)

Parameters

• Filename: String - The ZIP file to be opened/created.

Return

• Variant (ZipFile)

Example

Dest = SaveDialog("ISYS_Extracted_Documents.zip", "Zip Files (*.zip)|*.zip")
If Dest <> "" Then
  Set Zip = NewZipFile(Dest)
  Set Documents = App.ActiveTab.FetchPrompt
  Do While Not Documents.EOF
    Zip.AddFile Documents.Item.FileOnDisk, SafeFilename(Documents.Item.Filename)
    Documents.MoveNext
  Loop
  Zip.Save
End If

See Also

Macro Object Model

Runtime

• App property
• BrowseForFolder method
• Cancelled property
• Filename property
• Name property
• OpenDialog method
• Progress method
• SafeFilename method
• SaveDialog method